program SuperPascal;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
n,k,i,j,c,b,a,s,z,i1,j1:integer;

begin
writeln('enter n');
readln(n);
writeln('enter k');
readln(k);
begin
   begin
  a:=1;
  b:=1;
  c:=1;
  for i:=1 to n do
    begin
      a:=a*i;
    end;
  for j:=1 to (n-k) do
    begin
      b:=b*j;
    end;

  for s:=1 to k do
    begin
      c:=c*s;
    end;
 end;
end;
for j1:=1 to n do
 begin

  for i1:=1 to j1 do
    begin
      write(a div(b*c));
    end;
    writeln;
 end;
readln;
end.


